unit perteknik;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
  Db, ADODB;

type
  Tdmteknik = class(TForm)
    adoper: TADOQuery;
    adopers: TDataSource;
    perhesap: TADOStoredProc;
    Perbul: TADOQuery;
    PerbulS: TDataSource;
    Perhar: TADOQuery;
    Perhars: TDataSource;
    Perhartarih: TDateTimeField;
    Perhargelissaati: TDateTimeField;
    Perharcikissaati: TDateTimeField;
    Perharadi: TStringField;
    Perharsoyadi: TStringField;
    Perharizin: TDateTimeField;
    Perharperno: TStringField;
    spizin: TADOStoredProc;
    Perharngelis: TDateTimeField;
    Perharnayrilis: TDateTimeField;
    Connect: TADOConnection;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  dmteknik: Tdmteknik;

implementation

{$R *.DFM}

end.
